home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •Games Parlour• / •O Wah Ree• / Pits & Stones v2.20 ••••• / Pits & Stones v2.20 еееее.rsrc / CODE_1.txt < prev    next >
Text File  |  1990-05-28  |  24KB  |  452 lines
  1. # near model CODE resource
  2. # jump table entries: 0-9 (10 of them)
  3. 00000000  0000 0000                ori.b      D0, 0x0
  4. 00000004  0000 014A                ori.b      D0, 0x4A /* 'J' */
  5. export_0:
  6. 00000008  4278 0A4A                clr.w      [0x00000A4A /* FPState */]
  7. 0000000C  9DCE                     sub.l      A6, A6
  8. 0000000E  2C3C 5354 5253           move.l     D6, 0x53545253 /* 'STRS' */
  9. 00000014  4EBA 02AC                jsr        [PC + 0x2AC /* 000002C2 */]
  10. 00000018  41FA FFE6                lea.l      A0, [PC - 0x1A /* 00000000, value 0x0, cstring "" */]
  11. 0000001C  208C                     move.l     [A0], A4
  12. 0000001E  4EBA 0078                jsr        [PC + 0x78 /* 00000098 */]
  13. 00000022  4EBA 036E                jsr        [PC + 0x36E /* 00000392 */]
  14. 00000026  4267                     clr.w      -[A7]
  15. 00000028  4879 0000 FFFF           push.l     0xFFFF
  16. 0000002E  486F 0004                pea.l      [A7 + 0x4]
  17. 00000032  4857                     pea.l      [A7]
  18. 00000034  3F3C 0001                move.w     -[A7], 0x1
  19. 00000038  223A FFCA                move.l     D1, [PC - 0x36 /* 00000004, value 0x14A, cstring "" */]
  20. 0000003C  4EB5 1000                jsr        [A5 + D1.w]
  21. 00000040  206D 006C                movea.l    A0, [A5 + 0x6C]
  22. 00000044  4E90                     jsr        [A0]
  23. 00000046  A9F4                     syscall    ExitToShell
  24. 00000048  48E7 FFF8                movem.l    -[A7], D0,D1,D2,D3,D4,D5,D6,D7,A0,A1,A2,A3,A4
  25. 0000004C  3E2F 003C                move.w     D7, [A7 + 0x3C]
  26. 00000050  50F8 0A5E                st         [0x00000A5E /* ResLoad */]
  27. 00000054  598F                     subq.l     A7, 4
  28. 00000056  2F3C 434F 4445           move.l     -[A7], 0x434F4445 /* 'CODE' */
  29. 0000005C  3F07                     move.w     -[A7], D7
  30. 0000005E  A9A0                     syscall    GetResource
  31. 00000060  201F                     move.l     D0, [A7]+
  32. 00000062  6730                     beq        +0x32 /* 00000094 */
  33. 00000064  2640                     movea.l    A3, D0
  34. 00000066  2453                     movea.l    A2, [A3]
  35. 00000068  0892 0007                bclr.b     [A2], 0x7
  36. 0000006C  6720                     beq        +0x22 /* 0000008E */
  37. 0000006E  4EBA 0098                jsr        [PC + 0x98 /* 00000108 */]
  38. 00000072  A029                     syscall    HLock
  39. 00000074  598F                     subq.l     A7, 4
  40. 00000076  2F3C 4352 454C           move.l     -[A7], 0x4352454C /* 'CREL' */
  41. 0000007C  3F07                     move.w     -[A7], D7
  42. 0000007E  A9A0                     syscall    GetResource
  43. 00000080  4EBA 0098                jsr        [PC + 0x98 /* 0000011A */]
  44. 00000084  201F                     move.l     D0, [A7]+
  45. 00000086  670C                     beq        +0xE /* 00000094 */
  46. 00000088  2040                     movea.l    A0, D0
  47. 0000008A  4EBA 0058                jsr        [PC + 0x58 /* 000000E4 */]
  48. label0000008E:
  49. 0000008E  4CDF 1FFF                movem.l    D0,D1,D2,D3,D4,D5,D6,D7,A0,A1,A2,A3,A4, [A7]+
  50. 00000092  4E75                     rts
  51. label00000094:
  52. 00000094  700F                     moveq.l    D0, 0x0F
  53. 00000096  A9C9                     syscall    SysError
  54. fn00000098:
  55. 00000098  598F                     subq.l     A7, 4
  56. 0000009A  2F3C 5A45 524F           move.l     -[A7], 0x5A45524F /* 'ZERO' */
  57. 000000A0  4267                     clr.w      -[A7]
  58. 000000A2  A9A0                     syscall    GetResource
  59. 000000A4  2457                     movea.l    A2, [A7]
  60. 000000A6  598F                     subq.l     A7, 4
  61. 000000A8  2F3C 4441 5441           move.l     -[A7], 0x44415441 /* 'DATA' */
  62. 000000AE  4267                     clr.w      -[A7]
  63. 000000B0  A9A0                     syscall    GetResource
  64. 000000B2  2057                     movea.l    A0, [A7]
  65. 000000B4  2050                     movea.l    A0, [A0]
  66. 000000B6  2278 0908                movea.l    A1, [0x00000908 /* CurStackBase */]
  67. 000000BA  2452                     movea.l    A2, [A2]
  68. 000000BC  600E                     bra        +0x10 /* 000000CC */
  69. label000000BE:
  70. 000000BE  32D8                     move.w     [A1]+, [A0]+
  71. 000000C0  660A                     bne        +0xC /* 000000CC */
  72. 000000C2  321A                     move.w     D1, [A2]+
  73. 000000C4  6002                     bra        +0x4 /* 000000C8 */
  74. label000000C6:
  75. 000000C6  4219                     clr.b      [A1]+
  76. label000000C8:
  77. 000000C8  51C9 FFFC                dbf        D1, -0x6 /* 000000C6 */
  78. label000000CC:
  79. 000000CC  BBC9                     cmpa.l     A5, A1
  80. 000000CE  66EE                     bne        -0x10 /* 000000BE */
  81. 000000D0  A9A3                     syscall    ReleaseResource
  82. 000000D2  A9A3                     syscall    ReleaseResource
  83. 000000D4  598F                     subq.l     A7, 4
  84. 000000D6  2F3C 4452 454C           move.l     -[A7], 0x4452454C /* 'DREL' */
  85. 000000DC  4267                     clr.w      -[A7]
  86. 000000DE  A9A0                     syscall    GetResource
  87. 000000E0  205F                     movea.l    A0, [A7]+
  88. 000000E2  244D                     movea.l    A2, A5
  89. fn000000E4:
  90. 000000E4  A025                     syscall    GetHandleSize
  91. 000000E6  2F08                     move.l     -[A7], A0
  92. 000000E8  2050                     movea.l    A0, [A0]
  93. 000000EA  E240                     asr        D0.w, 1
  94. 000000EC  6012                     bra        +0x14 /* 00000100 */
  95. label000000EE:
  96. 000000EE  240D                     move.l     D2, A5
  97. 000000F0  3218                     move.w     D1, [A0]+
  98. 000000F2  0881 0000                bclr.b     D1, 0x0
  99. 000000F6  6704                     beq        +0x6 /* 000000FC */
  100. 000000F8  243A FF06                move.l     D2, [PC - 0xFA /* 00000000, value 0x0, cstring "" */]
  101. label000000FC:
  102. 000000FC  D5B2 1000                add.l      [A2 + D1.w], D2
  103. label00000100:
  104. 00000100  51C8 FFEC                dbf        D0, -0x16 /* 000000EE */
  105. 00000104  A9A3                     syscall    ReleaseResource
  106. 00000106  4E75                     rts
  107. fn00000108:
  108. 00000108  204B                     movea.l    A0, A3
  109. 0000010A  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  110. 0000010E  6A04                     bpl        +0x6 /* 00000114 */
  111. 00000110  1613                     move.b     D3, [A3]
  112. 00000112  4E75                     rts
  113. label00000114:
  114. 00000114  A069                     syscall    HGetState
  115. 00000116  1600                     move.b     D3, D0
  116. 00000118  4E75                     rts
  117. fn0000011A:
  118. 0000011A  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  119. 0000011E  6A04                     bpl        +0x6 /* 00000124 */
  120. 00000120  1683                     move.b     [A3], D3
  121. 00000122  4E75                     rts
  122. label00000124:
  123. 00000124  204B                     movea.l    A0, A3
  124. 00000126  1003                     move.b     D0, D3
  125. 00000128  A06A                     syscall    HSetState
  126. 0000012A  4E75                     rts
  127. export_1:
  128. 0000012C  205F                     movea.l    A0, [A7]+
  129. 0000012E  3218                     move.w     D1, [A0]+
  130. label00000130:
  131. 00000130  3418                     move.w     D2, [A0]+
  132. 00000132  B058                     cmp.w      D0, [A0]+
  133. 00000134  57C9 FFFA                dbeq       D1, -0x8 /* 00000130 */
  134. 00000138  4A42                     tst.w      D2
  135. label0000013A:
  136. 0000013A  67FE                     beq        -0x0 /* 0000013A */
  137. 0000013C  4EF0 20FC                jmp        [A0 + D2.w - 0x4]
  138. export_2:
  139. 00000140  205F                     movea.l    A0, [A7]+
  140. 00000142  3218                     move.w     D1, [A0]+
  141. label00000144:
  142. 00000144  3418                     move.w     D2, [A0]+
  143. 00000146  B098                     cmp.l      D0, [A0]+
  144. 00000148  57C9 FFFA                dbeq       D1, -0x8 /* 00000144 */
  145. 0000014C  4A42                     tst.w      D2
  146. label0000014E:
  147. 0000014E  67FE                     beq        -0x0 /* 0000014E */
  148. 00000150  4EF0 20FA                jmp        [A0 + D2.w - 0x6]
  149. export_3:
  150. 00000154  205F                     movea.l    A0, [A7]+
  151. 00000156  3218                     move.w     D1, [A0]+
  152. 00000158  3418                     move.w     D2, [A0]+
  153. 0000015A  B042                     cmp.w      D0, D2
  154. 0000015C  6E0A                     bgt        +0xC /* 00000168 */
  155. 0000015E  9041                     sub.w      D0, D1
  156. 00000160  6D06                     blt        +0x8 /* 00000168 */
  157. 00000162  D040                     add.w      D0, D0
  158. 00000164  41F0 0002                lea.l      A0, [A0 + D0.w + 0x2]
  159. label00000168:
  160. 00000168  3010                     move.w     D0, [A0]
  161. label0000016A:
  162. 0000016A  67FE                     beq        -0x0 /* 0000016A */
  163. 0000016C  4EF0 0000                jmp        [A0 + D0.w]
  164. export_4:
  165. 00000170  202F 0004                move.l     D0, [A7 + 0x4]
  166. 00000174  2F41 0004                move.l     [A7 + 0x4], D1
  167. 00000178  222F 0008                move.l     D1, [A7 + 0x8]
  168. 0000017C  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  169. 00000180  48E7 3C00                movem.l    -[A7], D2,D3,D4,D5
  170. 00000184  2400                     move.l     D2, D0
  171. 00000186  2601                     move.l     D3, D1
  172. 00000188  4842                     swap.w     D2
  173. 0000018A  C4C3                     mulu.w     D2, D3
  174. 0000018C  2800                     move.l     D4, D0
  175. 0000018E  2A01                     move.l     D5, D1
  176. 00000190  4845                     swap.w     D5
  177. 00000192  C8C5                     mulu.w     D4, D5
  178. 00000194  D444                     add.w      D2, D4
  179. 00000196  4842                     swap.w     D2
  180. 00000198  4242                     clr.w      D2
  181. 0000019A  C0C1                     mulu.w     D0, D1
  182. 0000019C  D082                     add.l      D0, D2
  183. 0000019E  4CDF 003C                movem.l    D2,D3,D4,D5, [A7]+
  184. 000001A2  221F                     move.l     D1, [A7]+
  185. 000001A4  4E75                     rts
  186. export_5:
  187. 000001A6  202F 0004                move.l     D0, [A7 + 0x4]
  188. 000001AA  2F41 0004                move.l     [A7 + 0x4], D1
  189. 000001AE  222F 0008                move.l     D1, [A7 + 0x8]
  190. 000001B2  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  191. 000001B6  48E7 3100                movem.l    -[A7], D2,D3,D7
  192. 000001BA  4EBA 009C                jsr        [PC + 0x9C /* 00000258 */]
  193. 000001BE  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  194. 000001C2  221F                     move.l     D1, [A7]+
  195. 000001C4  4E75                     rts
  196. export_6:
  197. 000001C6  202F 0004                move.l     D0, [A7 + 0x4]
  198. 000001CA  2F41 0004                move.l     [A7 + 0x4], D1
  199. 000001CE  222F 0008                move.l     D1, [A7 + 0x8]
  200. 000001D2  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  201. 000001D6  48E7 3100                movem.l    -[A7], D2,D3,D7
  202. 000001DA  4EBA 007C                jsr        [PC + 0x7C /* 00000258 */]
  203. 000001DE  2001                     move.l     D0, D1
  204. 000001E0  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  205. 000001E4  221F                     move.l     D1, [A7]+
  206. 000001E6  4E75                     rts
  207. export_7:
  208. 000001E8  202F 0004                move.l     D0, [A7 + 0x4]
  209. 000001EC  2F41 0004                move.l     [A7 + 0x4], D1
  210. 000001F0  222F 0008                move.l     D1, [A7 + 0x8]
  211. 000001F4  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  212. 000001F8  48E7 3100                movem.l    -[A7], D2,D3,D7
  213. 000001FC  4EBA 002C                jsr        [PC + 0x2C /* 0000022A */]
  214. 00000200  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  215. 00000204  221F                     move.l     D1, [A7]+
  216. 00000206  4E75                     rts
  217. export_8:
  218. 00000208  202F 0004                move.l     D0, [A7 + 0x4]
  219. 0000020C  2F41 0004                move.l     [A7 + 0x4], D1
  220. 00000210  222F 0008                move.l     D1, [A7 + 0x8]
  221. 00000214  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  222. 00000218  48E7 3100                movem.l    -[A7], D2,D3,D7
  223. 0000021C  4EBA 000C                jsr        [PC + 0xC /* 0000022A */]
  224. 00000220  2001                     move.l     D0, D1
  225. 00000222  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  226. 00000226  221F                     move.l     D1, [A7]+
  227. 00000228  4E75                     rts
  228. fn0000022A:
  229. 0000022A  4A80                     tst.l      D0
  230. 0000022C  6A1C                     bpl        +0x1E /* 0000024A */
  231. 0000022E  4A81                     tst.l      D1
  232. 00000230  6A0C                     bpl        +0xE /* 0000023E */
  233. 00000232  4480                     neg.l      D0
  234. 00000234  4481                     neg.l      D1
  235. 00000236  4EBA 0020                jsr        [PC + 0x20 /* 00000258 */]
  236. 0000023A  4481                     neg.l      D1
  237. 0000023C  4E75                     rts
  238. label0000023E:
  239. 0000023E  4480                     neg.l      D0
  240. 00000240  4EBA 0016                jsr        [PC + 0x16 /* 00000258 */]
  241. 00000244  4480                     neg.l      D0
  242. 00000246  4481                     neg.l      D1
  243. 00000248  4E75                     rts
  244. label0000024A:
  245. 0000024A  4A81                     tst.l      D1
  246. 0000024C  6A0A                     bpl        +0xC /* 00000258 */
  247. 0000024E  4481                     neg.l      D1
  248. 00000250  4EBA 0006                jsr        [PC + 0x6 /* 00000258 */]
  249. 00000254  4480                     neg.l      D0
  250. 00000256  4E75                     rts
  251. fn00000258:
  252. 00000258  2E3C 0000 FFFF           move.l     D7, 0xFFFF
  253. 0000025E  B280                     cmp.l      D1, D0
  254. 00000260  6306                     bls        +0x8 /* 00000268 */
  255. 00000262  2200                     move.l     D1, D0
  256. 00000264  7000                     moveq.l    D0, 0x00
  257. 00000266  4E75                     rts
  258. label00000268:
  259. 00000268  B087                     cmp.l      D0, D7
  260. 0000026A  620C                     bhi        +0xE /* 00000278 */
  261. 0000026C  80C1                     divu.w     D0, D1
  262. 0000026E  4840                     swap.w     D0
  263. 00000270  3200                     move.w     D1, D0
  264. 00000272  4240                     clr.w      D0
  265. 00000274  4840                     swap.w     D0
  266. 00000276  4E75                     rts
  267. label00000278:
  268. 00000278  B287                     cmp.l      D1, D7
  269. 0000027A  621A                     bhi        +0x1C /* 00000296 */
  270. 0000027C  2E00                     move.l     D7, D0
  271. 0000027E  4240                     clr.w      D0
  272. 00000280  4840                     swap.w     D0
  273. 00000282  80C1                     divu.w     D0, D1
  274. 00000284  4840                     swap.w     D0
  275. 00000286  4847                     swap.w     D7
  276. 00000288  3E00                     move.w     D7, D0
  277. 0000028A  4847                     swap.w     D7
  278. 0000028C  8EC1                     divu.w     D7, D1
  279. 0000028E  3007                     move.w     D0, D7
  280. 00000290  4847                     swap.w     D7
  281. 00000292  3207                     move.w     D1, D7
  282. 00000294  4E75                     rts
  283. label00000296:
  284. 00000296  2400                     move.l     D2, D0
  285. 00000298  2601                     move.l     D3, D1
  286. label0000029A:
  287. 0000029A  E288                     lsr        D0, 1
  288. 0000029C  E289                     lsr        D1, 1
  289. 0000029E  B287                     cmp.l      D1, D7
  290. 000002A0  62F8                     bhi        -0x6 /* 0000029A */
  291. 000002A2  80C1                     divu.w     D0, D1
  292. 000002A4  C087                     and.l      D0, D7
  293. label000002A6:
  294. 000002A6  3203                     move.w     D1, D3
  295. 000002A8  C2C0                     mulu.w     D1, D0
  296. 000002AA  2E03                     move.l     D7, D3
  297. 000002AC  4847                     swap.w     D7
  298. 000002AE  CEC0                     mulu.w     D7, D0
  299. 000002B0  4847                     swap.w     D7
  300. 000002B2  D287                     add.l      D1, D7
  301. 000002B4  6508                     bcs        +0xA /* 000002BE */
  302. 000002B6  9282                     sub.l      D1, D2
  303. 000002B8  6204                     bhi        +0x6 /* 000002BE */
  304. 000002BA  4481                     neg.l      D1
  305. 000002BC  4E75                     rts
  306. label000002BE:
  307. 000002BE  5340                     subq.w     D0, 1
  308. 000002C0  60E4                     bra        -0x1A /* 000002A6 */
  309. fn000002C2:
  310. 000002C2  7E00                     moveq.l    D7, 0x00
  311. 000002C4  51F8 0A5E                sf         [0x00000A5E /* ResLoad */]
  312. 000002C8  598F                     subq.l     A7, 4
  313. 000002CA  2F06                     move.l     -[A7], D6
  314. 000002CC  3F07                     move.w     -[A7], D7
  315. 000002CE  A9A0                     syscall    GetResource
  316. 000002D0  201F                     move.l     D0, [A7]+
  317. 000002D2  6700 00AE                beq        +0xB0 /* 00000382 */
  318. 000002D6  2640                     movea.l    A3, D0
  319. 000002D8  598F                     subq.l     A7, 4
  320. 000002DA  2F0B                     move.l     -[A7], A3
  321. 000002DC  A9A5                     syscall    GetResourceSizeOnDisk/SizeResource/SizeRsrc
  322. 000002DE  261F                     move.l     D3, [A7]+
  323. 000002E0  200B                     move.l     D0, A3
  324. 000002E2  2803                     move.l     D4, D3
  325. 000002E4  5247                     addq.w     D7, 1
  326. 000002E6  EF47                     asl        D7.w, 7
  327. 000002E8  5247                     addq.w     D7, 1
  328. 000002EA  3A07                     move.w     D5, D7
  329. 000002EC  6016                     bra        +0x18 /* 00000304 */
  330. label000002EE:
  331. 000002EE  598F                     subq.l     A7, 4
  332. 000002F0  2F06                     move.l     -[A7], D6
  333. 000002F2  3F07                     move.w     -[A7], D7
  334. 000002F4  A9A0                     syscall    GetResource
  335. 000002F6  201F                     move.l     D0, [A7]+
  336. 000002F8  6700 0088                beq        +0x8A /* 00000382 */
  337. 000002FC  5247                     addq.w     D7, 1
  338. 000002FE  0684 0000 7FFE           addi.l     D4, 0x7FFE
  339. label00000304:
  340. 00000304  558F                     subq.l     A7, 2
  341. 00000306  2F00                     move.l     -[A7], D0
  342. 00000308  A9A6                     syscall    GetResAttrs
  343. 0000030A  301F                     move.w     D0, [A7]+
  344. 0000030C  0800 0005                btst.b     D0, 0x5
  345. 00000310  66DC                     bne        -0x22 /* 000002EE */
  346. 00000312  50F8 0A5E                st         [0x00000A5E /* ResLoad */]
  347. 00000316  CF45                     exg        D7, D5
  348. 00000318  9A47                     sub.w      D5, D7
  349. 0000031A  661C                     bne        +0x1E /* 00000338 */
  350. 0000031C  2003                     move.l     D0, D3
  351. 0000031E  A040                     syscall    ResrvMem/ReserveMem
  352. 00000320  2F0B                     move.l     -[A7], A3
  353. 00000322  A9A2                     syscall    LoadResource
  354. 00000324  2013                     move.l     D0, [A3]
  355. 00000326  6700 005A                beq        +0x5C /* 00000382 */
  356. 0000032A  2F0B                     move.l     -[A7], A3
  357. 0000032C  A992                     syscall    DetachResource
  358. 0000032E  2853                     movea.l    A4, [A3]
  359. 00000330  204B                     movea.l    A0, A3
  360. 00000332  A029                     syscall    HLock
  361. 00000334  7001                     moveq.l    D0, 0x01
  362. 00000336  4E75                     rts
  363. label00000338:
  364. 00000338  2004                     move.l     D0, D4
  365. 0000033A  A11E                     syscall    NewPtr, flags=1
  366. 0000033C  2008                     move.l     D0, A0
  367. 0000033E  6700 0042                beq        +0x44 /* 00000382 */
  368. 00000342  2848                     movea.l    A4, A0
  369. 00000344  2F0B                     move.l     -[A7], A3
  370. 00000346  A9A2                     syscall    LoadResource
  371. 00000348  2013                     move.l     D0, [A3]
  372. 0000034A  6700 0036                beq        +0x38 /* 00000382 */
  373. 0000034E  204B                     movea.l    A0, A3
  374. 00000350  2003                     move.l     D0, D3
  375. 00000352  6018                     bra        +0x1A /* 0000036C */
  376. label00000354:
  377. 00000354  598F                     subq.l     A7, 4
  378. 00000356  2F06                     move.l     -[A7], D6
  379. 00000358  3F07                     move.w     -[A7], D7
  380. 0000035A  A9A0                     syscall    GetResource
  381. 0000035C  201F                     move.l     D0, [A7]+
  382. 0000035E  6700 0022                beq        +0x24 /* 00000382 */
  383. 00000362  5247                     addq.w     D7, 1
  384. 00000364  2040                     movea.l    A0, D0
  385. 00000366  203C 0000 7FFE           move.l     D0, 0x7FFE
  386. label0000036C:
  387. 0000036C  2F08                     move.l     -[A7], A0
  388. 0000036E  2050                     movea.l    A0, [A0]
  389. 00000370  224C                     movea.l    A1, A4
  390. 00000372  D9C0                     add.l      A4, D0
  391. 00000374  A02E                     syscall    BlockMove/BlockMoveData
  392. 00000376  A9A3                     syscall    ReleaseResource
  393. 00000378  51CD FFDA                dbf        D5, -0x28 /* 00000354 */
  394. 0000037C  99C4                     sub.l      A4, D4
  395. 0000037E  264C                     movea.l    A3, A4
  396. 00000380  7001                     moveq.l    D0, 0x01
  397. label00000382:
  398. 00000382  4E75                     rts
  399. 00000384  204B                     movea.l    A0, A3
  400. 00000386  4A45                     tst.w      D5
  401. 00000388  6604                     bne        +0x6 /* 0000038E */
  402. 0000038A  A023                     syscall    DisposHandle/DisposeHandle
  403. 0000038C  4E75                     rts
  404. label0000038E:
  405. 0000038E  A01F                     syscall    DisposPtr/DisposePtr
  406. 00000390  4E75                     rts
  407. fn00000392:
  408. 00000392  7018                     moveq.l    D0, 0x18
  409. 00000394  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  410. 00000398  6A04                     bpl        +0x6 /* 0000039E */
  411. 0000039A  A51E                     syscall    NewPtrSys, flags=5
  412. 0000039C  6002                     bra        +0x4 /* 000003A0 */
  413. label0000039E:
  414. 0000039E  A11E                     syscall    NewPtr, flags=1
  415. label000003A0:
  416. 000003A0  2248                     movea.l    A1, A0
  417. 000003A2  2B49 0068                move.l     [A5 + 0x68], A1
  418. 000003A6  303C A9F0                move.w     D0, 0xA9F0
  419. 000003AA  A146                     syscall    GetTrapAddress, flags=1
  420. 000003AC  2208                     move.l     D1, A0
  421. 000003AE  303C A9F0                move.w     D0, 0xA9F0
  422. 000003B2  2049                     movea.l    A0, A1
  423. 000003B4  A047                     syscall    SetTrapAddress
  424. 000003B6  32FC 4EB9                move.w     [A1]+, 0x4EB9
  425. 000003BA  41FA FC8C                lea.l      A0, [PC - 0x374 /* 00000048, value 0x48E7FFF8 */]
  426. 000003BE  22C8                     move.l     [A1]+, A0
  427. 000003C0  32FC 4EF9                move.w     [A1]+, 0x4EF9
  428. 000003C4  22C1                     move.l     [A1]+, D1
  429. 000003C6  303C A9F4                move.w     D0, 0xA9F4
  430. 000003CA  A146                     syscall    GetTrapAddress, flags=1
  431. 000003CC  2208                     move.l     D1, A0
  432. 000003CE  303C A9F4                move.w     D0, 0xA9F4
  433. 000003D2  2049                     movea.l    A0, A1
  434. 000003D4  A047                     syscall    SetTrapAddress
  435. 000003D6  32FC 4EB9                move.w     [A1]+, 0x4EB9
  436. 000003DA  41FA FC64                lea.l      A0, [PC - 0x39C /* 00000040, value 0x206D006C ' m\0l', cstring " m" */]
  437. 000003DE  22C8                     move.l     [A1]+, A0
  438. 000003E0  32FC 4EF9                move.w     [A1]+, 0x4EF9
  439. 000003E4  22C1                     move.l     [A1]+, D1
  440. 000003E6  4E75                     rts
  441. export_9:
  442. 000003E8  226D 0068                movea.l    A1, [A5 + 0x68]
  443. 000003EC  303C A9F0                move.w     D0, 0xA9F0
  444. 000003F0  2069 0008                movea.l    A0, [A1 + 0x8]
  445. 000003F4  A047                     syscall    SetTrapAddress
  446. 000003F6  303C A9F4                move.w     D0, 0xA9F4
  447. 000003FA  2069 0014                movea.l    A0, [A1 + 0x14]
  448. 000003FE  A047                     syscall    SetTrapAddress
  449. 00000400  2049                     movea.l    A0, A1
  450. 00000402  A01F                     syscall    DisposPtr/DisposePtr
  451. 00000404  4E75                     rts
  452.